(pmail): Ensure that pmail-mode-hook is run.

diff --git a/lisp/mail/pmail.el b/lisp/mail/pmail.el
index 76949ff95cee53a4afd9fdf7b9c9afc6db036f88..b548a69ca795438504103a1cc0a5d8fedeee513e 100644 (file)
--- a/lisp/mail/pmail.el
+++ b/lisp/mail/pmail.el
@@ -875,6 +875,8 @@ If `pmail-display-summary' is non-nil, make a summary for this PMAIL file."
     (pmail-swap-buffers-maybe)
     (if (eq major-mode 'pmail-edit-mode)
        (error "Exit Pmail Edit mode before getting new mail"))
+    (or (and existed (> (buffer-size) 0))
+       (setq run-mail-hook t))
     ;; Insure that the Rmail file is in mbox format, the buffer is in
     ;; Pmail mode and has been scanned to find all the messages
     ;; (setting the global message variables in the process).